10 FORI=828TO928:READA:POKEI,A:T=T+A:NEXT
11 IFT<>11753THENPRINT"[147]ERROR IN DATA":STOP
12 POKE184,0:FORI=0TO2:POKE785+I,0:NEXT
15 POKE804,60:POKE805,3:POKE816,143:POKE817,3:POKE818,129:POKE819,3:NEW
100 DATA165,184,201,1,240,3,76,87,241,169,87,141,36,3,169
105 DATA241,141,37,3,169,165,141,48,3,169,244,141,49,3,169
110 DATA237,141,50,3,169,245,141,51,3,169,1,133,43,169,8
115 DATA133,44,169,82,141,119,2,169,117,141,120,2,169,13,141
120 DATA121,2,169,3,133,198,108,2,3,72,169,0,133,157,169
125 DATA147,32,210,255,104,76,237,245,72,165,10,240,9,169,147
130 DATA32,210,255,169,0,133,157,104,76,165,244